Những câu hỏi liên quan
Khách vãng lai
Xem chi tiết
Văn Bảo Nguyễn
30 tháng 12 2021 lúc 17:42

Để đánh số trang một quyển sách dày 295 trang cần dùng bao nhiêu chữ số?

Bình luận (0)
Nguyễn Lê Phước Thịnh
30 tháng 12 2021 lúc 23:43

a:

#include <bits/stdc++.h>

using namespace std;

long long i,n,s;

int main()

{

cin>>n;

s=0;

for (i=1; i<=n; i++) s=s+i;

cout<<s;

return 0;

}

Bình luận (0)
hoàng kim
Xem chi tiết
Nguyễn Lê Phước Thịnh
5 tháng 5 2021 lúc 23:25

Bài 1: 

uses crt;

var a:array[1..100]of integer;

i,n,min:integer;

begin

clrscr;

write('n='); readln(n);

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

min:=a[1];

for i:=1 to n do 

if min>a[i] then min:=a[i];

writeln(min);

readln;

end.

Bình luận (1)
Nguyễn Lê Phước Thịnh
5 tháng 5 2021 lúc 23:26

Bài 2: 

uses crt;

var a:array[1..100]of integer;

i,n,max:integer;

begin

clrscr;

write('n='); readln(n);

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

max:=a[1];

for i:=1 to n do 

 if max<a[i] then max:=a[i];

writeln(max);

readln;

end.

Bình luận (0)
dswat monkey
Xem chi tiết
Nguyễn Lê Phước Thịnh
2 tháng 1 2022 lúc 9:36

c: 

#include <bits/stdc++.h>

using namespace std;

long long ln,i,n,x;

int main()

{

cin>>n;

ln=LLONG_MIN;

for (i=1; i<=n; i++)

{

cin>>x;

ln=max(ln,x);

}

cout<<ln;

return 0;

}

Bình luận (0)
Bùi Thế Hùng
Xem chi tiết
39_Lê Thành Vinh
Xem chi tiết
Nguyễn Lê Phước Thịnh
25 tháng 12 2021 lúc 9:03

#include <bits/stdc++.h>

using namespace std;

long long s,i,n;

int main()

{

cin>>n;

s=0;

for (i=1; i<=n; i++) s=s+i*i;

cout<<s;

return 0;

}

Bình luận (0)
Bảo Châu Lê
Xem chi tiết
Nguyễn Lê Phước Thịnh
24 tháng 12 2022 lúc 13:52

Câu 2:

#include <bits/stdc++.h>

using namespace std;

long long n;

int main()

{

cin>>n;

if (n>0 && n%5==0) cout<<"Phai";

else cout<<"Khong phai";

}

Bình luận (0)
Anh Tran
Xem chi tiết
Nguyễn Lê Phước Thịnh
23 tháng 5 2022 lúc 9:16

uses crt;

var a:array[1..100]of integer;

i,n,nn,s:integer;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

nn:=a[1];

s:=1;

for i:=1 to n do 

begin

if nn>a[i] then nn:=a[i];

s:=s*a[i];

end;

writeln(nn);

writeln(s);

readln;

end.

Bình luận (0)
k_o_t_en
Xem chi tiết
Phan Huy
Xem chi tiết